﻿Public Class DataUpdatedEventArgs(Of T)
    Inherits EventArgs

    Public Sub New(ByVal oldItem As T, ByVal newItem As T, ByVal result As Boolean)
        Me.OldItem = oldItem
        Me.NewItem = newItem
        Me.Result = result
    End Sub

    Private _newItem As T
    Public Property NewItem() As T
        Get
            Return _newItem
        End Get
        Set(ByVal value As T)
            _newItem = value
        End Set
    End Property

    Private _oldItem As T
    Public Property OldItem() As T
        Get
            Return _oldItem
        End Get
        Set(ByVal value As T)
            _oldItem = value
        End Set
    End Property

    Private _result As Boolean
    Public Property Result() As Boolean
        Get
            Return _result
        End Get
        Set(ByVal value As Boolean)
            _result = value
        End Set
    End Property

End Class
